\(\int \cos (a+b x) \cos (c+d x) \, dx\) [240]

Optimal result

Integrand size = 13, antiderivative size = 43 \[ \int \cos (a+b x) \cos (c+d x) \, dx=\frac {\sin (a-c+(b-d) x)}{2 (b-d)}+\frac {\sin (a+c+(b+d) x)}{2 (b+d)} \]

[Out]

1/2*sin(a-c+(b-d)*x)/(b-d)+1/2*sin(a+c+(b+d)*x)/(b+d)

Rubi [A] (verified)

Time = 0.04 (sec) , antiderivative size = 43, normalized size of antiderivative = 1.00, number of steps used = 4, number of rules used = 2, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.154, Rules used = {4666, 2717} \[ \int \cos (a+b x) \cos (c+d x) \, dx=\frac {\sin (a+x (b-d)-c)}{2 (b-d)}+\frac {\sin (a+x (b+d)+c)}{2 (b+d)} \]

[In]

Int[Cos[a + b*x]*Cos[c + d*x],x]

[Out]

Sin[a - c + (b - d)*x]/(2*(b - d)) + Sin[a + c + (b + d)*x]/(2*(b + d))

Rule 2717

Int[sin[Pi/2 + (c_.) + (d_.)*(x_)], x_Symbol] :> Simp[Sin[c + d*x]/d, x] /; FreeQ[{c, d}, x]

Rule 4666

Int[Cos[v_]^(p_.)*Cos[w_]^(q_.), x_Symbol] :> Int[ExpandTrigReduce[Cos[v]^p*Cos[w]^q, x], x] /; ((PolynomialQ[
v, x] && PolynomialQ[w, x]) || (BinomialQ[{v, w}, x] && IndependentQ[Cancel[v/w], x])) && IGtQ[p, 0] && IGtQ[q
, 0]

Rubi steps \begin{align*} \text {integral}& = \int \left (\frac {1}{2} \cos (a-c+(b-d) x)+\frac {1}{2} \cos (a+c+(b+d) x)\right ) \, dx \\ & = \frac {1}{2} \int \cos (a-c+(b-d) x) \, dx+\frac {1}{2} \int \cos (a+c+(b+d) x) \, dx \\ & = \frac {\sin (a-c+(b-d) x)}{2 (b-d)}+\frac {\sin (a+c+(b+d) x)}{2 (b+d)} \\ \end{align*}

Mathematica [A] (verified)

Time = 0.20 (sec) , antiderivative size = 43, normalized size of antiderivative = 1.00 \[ \int \cos (a+b x) \cos (c+d x) \, dx=\frac {\sin (a-c+(b-d) x)}{2 (b-d)}+\frac {\sin (a+c+(b+d) x)}{2 (b+d)} \]

[In]

Integrate[Cos[a + b*x]*Cos[c + d*x],x]

[Out]

Sin[a - c + (b - d)*x]/(2*(b - d)) + Sin[a + c + (b + d)*x]/(2*(b + d))

Maple [A] (verified)

Time = 0.30 (sec) , antiderivative size = 40, normalized size of antiderivative = 0.93

method	result	size
default	\(\frac {\sin \left (a -c +\left (b -d \right ) x \right )}{2 b -2 d}+\frac {\sin \left (a +c +\left (b +d \right ) x \right )}{2 b +2 d}\)	\(40\)
parallelrisch	\(\frac {\left (b +d \right ) \sin \left (a -c +\left (b -d \right ) x \right )+\sin \left (a +c +\left (b +d \right ) x \right ) \left (b -d \right )}{2 b^{2}-2 d^{2}}\)	\(48\)
risch	\(\frac {\sin \left (x b -d x +a -c \right ) b}{2 \left (b -d \right ) \left (b +d \right )}+\frac {\sin \left (x b -d x +a -c \right ) d}{2 \left (b -d \right ) \left (b +d \right )}+\frac {\sin \left (x b +d x +a +c \right ) b}{2 \left (b -d \right ) \left (b +d \right )}-\frac {\sin \left (x b +d x +a +c \right ) d}{2 \left (b -d \right ) \left (b +d \right )}\)	\(108\)
norman	\(\frac {\frac {2 b \tan \left (\frac {a}{2}+\frac {x b}{2}\right )}{b^{2}-d^{2}}-\frac {2 d \tan \left (\frac {d x}{2}+\frac {c}{2}\right )}{b^{2}-d^{2}}-\frac {2 b \tan \left (\frac {a}{2}+\frac {x b}{2}\right ) \tan \left (\frac {d x}{2}+\frac {c}{2}\right )^{2}}{b^{2}-d^{2}}+\frac {2 d \tan \left (\frac {a}{2}+\frac {x b}{2}\right )^{2} \tan \left (\frac {d x}{2}+\frac {c}{2}\right )}{b^{2}-d^{2}}}{\left (1+\tan \left (\frac {a}{2}+\frac {x b}{2}\right )^{2}\right ) \left (1+\tan \left (\frac {d x}{2}+\frac {c}{2}\right )^{2}\right )}\)	\(147\)

[In]

int(cos(b*x+a)*cos(d*x+c),x,method=_RETURNVERBOSE)

[Out]

1/2*sin(a-c+(b-d)*x)/(b-d)+1/2*sin(a+c+(b+d)*x)/(b+d)

Fricas [A] (verification not implemented)

none

Time = 0.24 (sec) , antiderivative size = 42, normalized size of antiderivative = 0.98 \[ \int \cos (a+b x) \cos (c+d x) \, dx=\frac {b \cos \left (d x + c\right ) \sin \left (b x + a\right ) - d \cos \left (b x + a\right ) \sin \left (d x + c\right )}{b^{2} - d^{2}} \]

[In]

integrate(cos(b*x+a)*cos(d*x+c),x, algorithm="fricas")

[Out]

(b*cos(d*x + c)*sin(b*x + a) - d*cos(b*x + a)*sin(d*x + c))/(b^2 - d^2)

Sympy [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 153 vs. \(2 (32) = 64\).

Time = 0.32 (sec) , antiderivative size = 153, normalized size of antiderivative = 3.56 \[ \int \cos (a+b x) \cos (c+d x) \, dx=\begin {cases} x \cos {\left (a \right )} \cos {\left (c \right )} & \text {for}\: b = 0 \wedge d = 0 \\- \frac {x \sin {\left (a - d x \right )} \sin {\left (c + d x \right )}}{2} + \frac {x \cos {\left (a - d x \right )} \cos {\left (c + d x \right )}}{2} - \frac {\sin {\left (a - d x \right )} \cos {\left (c + d x \right )}}{2 d} & \text {for}\: b = - d \\\frac {x \sin {\left (a + d x \right )} \sin {\left (c + d x \right )}}{2} + \frac {x \cos {\left (a + d x \right )} \cos {\left (c + d x \right )}}{2} + \frac {\sin {\left (a + d x \right )} \cos {\left (c + d x \right )}}{2 d} & \text {for}\: b = d \\\frac {b \sin {\left (a + b x \right )} \cos {\left (c + d x \right )}}{b^{2} - d^{2}} - \frac {d \sin {\left (c + d x \right )} \cos {\left (a + b x \right )}}{b^{2} - d^{2}} & \text {otherwise} \end {cases} \]

[In]

integrate(cos(b*x+a)*cos(d*x+c),x)

[Out]

Piecewise((x*cos(a)*cos(c), Eq(b, 0) & Eq(d, 0)), (-x*sin(a - d*x)*sin(c + d*x)/2 + x*cos(a - d*x)*cos(c + d*x
)/2 - sin(a - d*x)*cos(c + d*x)/(2*d), Eq(b, -d)), (x*sin(a + d*x)*sin(c + d*x)/2 + x*cos(a + d*x)*cos(c + d*x
)/2 + sin(a + d*x)*cos(c + d*x)/(2*d), Eq(b, d)), (b*sin(a + b*x)*cos(c + d*x)/(b**2 - d**2) - d*sin(c + d*x)*
cos(a + b*x)/(b**2 - d**2), True))

Maxima [A] (verification not implemented)

none

Time = 0.25 (sec) , antiderivative size = 40, normalized size of antiderivative = 0.93 \[ \int \cos (a+b x) \cos (c+d x) \, dx=\frac {\sin \left (b x + d x + a + c\right )}{2 \, {\left (b + d\right )}} - \frac {\sin \left (-b x + d x - a + c\right )}{2 \, {\left (b - d\right )}} \]

[In]

integrate(cos(b*x+a)*cos(d*x+c),x, algorithm="maxima")

[Out]

1/2*sin(b*x + d*x + a + c)/(b + d) - 1/2*sin(-b*x + d*x - a + c)/(b - d)

Giac [A] (verification not implemented)

none

Time = 0.29 (sec) , antiderivative size = 40, normalized size of antiderivative = 0.93 \[ \int \cos (a+b x) \cos (c+d x) \, dx=\frac {\sin \left (b x + d x + a + c\right )}{2 \, {\left (b + d\right )}} + \frac {\sin \left (b x - d x + a - c\right )}{2 \, {\left (b - d\right )}} \]

[In]

integrate(cos(b*x+a)*cos(d*x+c),x, algorithm="giac")

[Out]

1/2*sin(b*x + d*x + a + c)/(b + d) + 1/2*sin(b*x - d*x + a - c)/(b - d)

Mupad [B] (verification not implemented)

Time = 22.30 (sec) , antiderivative size = 84, normalized size of antiderivative = 1.95 \[ \int \cos (a+b x) \cos (c+d x) \, dx=\frac {b\,\left (\frac {\sin \left (a+c+b\,x+d\,x\right )}{2}+\frac {\sin \left (a-c+b\,x-d\,x\right )}{2}\right )}{b^2-d^2}-\frac {d\,\left (\frac {\sin \left (a+c+b\,x+d\,x\right )}{2}-\frac {\sin \left (a-c+b\,x-d\,x\right )}{2}\right )}{b^2-d^2} \]

[In]

int(cos(a + b*x)*cos(c + d*x),x)

[Out]

(b*(sin(a + c + b*x + d*x)/2 + sin(a - c + b*x - d*x)/2))/(b^2 - d^2) - (d*(sin(a + c + b*x + d*x)/2 - sin(a -
c + b*x - d*x)/2))/(b^2 - d^2)